home *** CD-ROM | disk | FTP | other *** search
/ Capitol Hill / Capitol Hill (1993)(The Software Toolworks).iso / support / office.mmm / meta.txt < prev    next >
Encoding:
Text File  |  1993-09-20  |  10.2 KB  |  110 lines

  1. Name
  2. ----
  3. Office+CAPITOL HILL:special mac files for windows:
  4.  
  5. Strings
  6. ------
  7. Macromedia Director
  8.  
  9. stxt
  10. ----
  11. X
  12. PH1
  13. Offices of You Know
  14. The Honorable r r
  15. House of Representatives
  16. Washington, D.C.  20515
  17.  
  18.  
  19. Dear Representative r,
  20.  
  21.      With the consideration of new health care regulation, an overwhelming task for lawmakers arises. As a physician and director of the A.D.A., I am well informed of the problems and costs of health care. The A.D.A. has studied various aspects of American medicine and has some sound advice for its impending rennovation. I will be in Washington with some of my colleagues next month. We will be bringing our message of cost reduction to Congress. If you are available for a luncheon or one of our informal evening gatherings, we would be honored by your attendance.
  22.  
  23. Sincerely,
  24. Benjamin Daly, M.D.
  25. Associate Director, A.D.A.
  26. x
  27. _
  28. _
  29. _
  30.  
  31. Script Channel Commands
  32. --------------------
  33. puppettransition 23
  34. starttimer
  35. play doneif BTYourOffice = FALSE then
  36.   set BTYourOffice = true
  37. else
  38.   puppettransition 23
  39.   go "atdesk"
  40. end ifglobal myPAlertList
  41. -- Get the next mail message from the linked list
  42. set aMsg =  myPAlertList(mGetNextMsg)
  43.  
  44. if (aMsg > 0) then
  45.   --beep aMsg
  46.   put "PH"&aMsg into myPhoneMessage
  47.   --put (myPhoneMessage) into cast B11
  48.   puppetSound myPhoneMessage
  49. end if
  50. cursor 4go the framepuppetsound 0-- Call up the sound according to your vote..
  51. --YRVote is passed from the invisible sprites above
  52. --the voting buttons. It returns "aye" "nay" or "pres"
  53.  
  54. put YRVote&aMsg into PSound
  55. sound playFile 01, "Capitol Hill:support:scsounds:"&PSoundvotehandlerpausego movie "Capitol Hill:support:PDA"phonehandlergo movie "Capitol Hill:support:Calendar"mailhandlercursor -1
  56. set the volume of sprite 21=128global myMAlertList,mailBox
  57. -- Get the next mail message from the linked list
  58. set aMsg =  myMAlertList(mGetNextMsg)
  59. mailBox(mGetMail,aMsg,B11)set the cursor of sprite 6=0
  60. set the cursor of sprite 7=0
  61. set the cursor of sprite 8=0
  62. repeat with i=193 to 195
  63.   put "_" into field i
  64. end repeat
  65. if soundbusy(1) then go the framesound fadeout 1,60go movie "Capitol Hill:support:Rolodex"puppetsound "s0"
  66. set s=1
  67. go "s"puppettransition 23
  68. go "atDesk" if cs=1 then
  69.   puppetsound "c2"
  70. else
  71.   set cs=1
  72.   puppetsound "c0"
  73. end if
  74. if field d11="X" or field d12="X" or field d13="X" then
  75.   puppettransition 23
  76.   go label("FP1")+2
  77. else
  78.   go "FP1"
  79. end if
  80. put "Offices of Rep."&&repname into field "blue"
  81. go "FlPln"spPhoneMSGgo the frame-1go movie "Capitol Hill:support:BgtPages"go marker(1)
  82. votehandlerput "Nay" into YRVote
  83. go the frame + 4put "Pres" into YRVote
  84. go the frame + 8set the cursor of sprite 6=1011
  85. set the cursor of sprite 7=1011
  86. set the cursor of sprite 8=1011go to frame "Talleying"global theTxtHandler
  87. puppettransition 23
  88. theTxtHandler(mClearTxtCast)
  89. starttimer
  90. play done
  91. global myVAlertList,theTxtHandler
  92. -- Get the next mail message from the linked list
  93. if (objectp(myVAlertList)) then
  94.   set aMsg =  myVAlertList(mGetNextMsg)
  95.   if (objectp(theTxtHandler) ) then
  96.     theTxtHandler(mSetTxtCast ,H36 , H37 , H38,0,0 )
  97.     theTxtHandler(mFormat , H36, 12, "bold", "center")
  98.     theTxtHandler(mFormat , H37, 11, "plain", "center")
  99.     theTxtHandler(mFormat , H38, 12, "plain", "center")
  100.     theTxtHandler(mSetBkStrs , "*" , "%", "%%",%%",%%")
  101.     theTxtHandler(mGetTxt,"BillText:Bill"&aMsg)
  102.   end if
  103. end ifpuppetsound "invite"puppetSound "DSKPEN" set the cursor of sprite 6=0
  104. set the cursor of sprite 7=0
  105. set the cursor of sprite 8=0go "Folderintro"puppetsound "job folder"
  106. unloadpuppettransition 23
  107. go label("FullFolder")+1go marker(1)
  108. phonehandlerif the clickon=0 then
  109.   set the movierate of sprite 21=0
  110.   go the frame+1
  111. else
  112.   if the movietime of sprite 21<the duration of cast(the castnum of sprite 21) then go the frame
  113. end ifgo label("fullfolder")+1if the mousedown then
  114.   set the movierate of sprite 21=0
  115.   go the frame+1
  116. else
  117.   if the movietime of sprite 21<the duration of cast(the castnum of sprite 21) then go the frame
  118. end ifwhen mousedown then skipif field d14="X" or field d15="X" or field d16="X" then
  119.   puppettransition 23
  120.   go label("FP2")+2
  121. else
  122.   go "FP2"
  123. end if
  124. if field d17="X" or field d18="X" or field d21="X" then
  125.   puppettransition 23
  126.   go label("FP3")+2
  127. else
  128.   go "FP3"
  129. end if
  130. if field d22="X" or field d23="X" or field d24="X" then
  131.   puppettransition 23
  132.   go label("FP4")+2
  133. else
  134.   go "FP4"
  135. end if
  136. if field d25="X" or field d26="X" or field d27="X" then
  137.   puppettransition 23
  138.   go label("FP5")+2
  139. else
  140.   go "FP5"
  141. end if
  142. if r=1 then
  143.   puppetsound "r1"
  144. else
  145.   set r=1
  146.   puppetsound "r0"
  147. end if
  148. if r=1 then
  149.   puppetsound "r4"
  150. else
  151.   set r=1
  152.   puppetsound "r0"
  153. end if
  154. if r=1 then
  155.   puppetsound "r3"
  156. else
  157.   set r=1
  158.   puppetsound "r0"
  159. end if
  160. if m=1 then
  161.   puppetsound "m1"
  162. else
  163.   set m=1
  164.   puppetsound "m0"
  165. end ifif m=1 then
  166.   puppetsound "m3"
  167. else
  168.   set m=1
  169.   puppetsound "m0"
  170. end ifpuppetsound "flush"set BTYourOffice = TRUEwhen mousedown then puppetsound 0puppetsound "your office"puppetsound "new office"if m=1 then
  171.   puppetsound "s6"
  172. else
  173.   set m=1
  174.   puppetsound "m0"
  175. end ifif m=1 then
  176.   puppetsound "m2"
  177. else
  178.   set m=1
  179.   puppetsound "m0"
  180. end ifgo marker(1)
  181. mailhandlerput "Yea" into YRVote
  182. go the frame + 1hire "baldwin"hire "raybal"hire "bream"hire "lee"hire "hayden"hire "stefanos"hire "ward"hire "cambridge"hire "kravitz"hire "quinn"hire "tischer"hire "modiglio"hire "farar"hire "tomee"hire "hernandez"puppetsound "s4"if r=1 then
  183.   puppetsound "r6"
  184. else
  185.   set r=1
  186.   puppetsound "r0"
  187. end if
  188. if r=1 then
  189.   puppetsound "r2"
  190. else
  191.   set r=1
  192.   puppetsound "r0"
  193. end if
  194. if cs=1 then
  195.   puppetsound "c3"
  196. else
  197.   set cs=1
  198.   puppetsound "c0"
  199. end if
  200. if cs=1 then
  201.   puppetsound "c1"
  202. else
  203.   set cs=1
  204.   puppetsound "c0"
  205. end if
  206. if r=1 then
  207.   puppetsound "r5"
  208. else
  209.   set r=1
  210.   puppetsound "r0"
  211. end if
  212. if s=1 then
  213.   puppetsound "s3"
  214. else
  215.   set s=1
  216.   puppetsound "s0"
  217. end if
  218. puppetsound "c0"
  219. set cs=1puppetsound "r0"
  220. set r=1puppetsound "m0"
  221. set m=1if rollover(9) then go "s"
  222. if rollover(10) then go "c"
  223. if rollover(11) then go "r"
  224. if rollover(12) then go "m"
  225. go the frameif s=1 then
  226.   puppetsound "s2"
  227. else
  228.   set s=1
  229.   puppetsound "s0"
  230. end if
  231. if s=1 then
  232.   puppetsound "s5"
  233. else
  234.   set s=1
  235.   puppetsound "s0"
  236. end if
  237. if s=1 then
  238.   puppetsound "s1"
  239. else
  240.   set s=1
  241.   puppetsound "s0"
  242. end if
  243.  
  244. vwci
  245. ----
  246. 1025: 
  247. YOtab.PICTCAPITOL HILL:Support:offsupt:
  248. YOtab.PICTPICT
  249. 1026:  OFFSEQ1.PICTCAPITOL HILL:Support:offsupt: OFFSEQ1.PICTPICT
  250. 1027:  OFFSEQ2.PICTCAPITOL HILL:Support:offsupt: OFFSEQ2.PICTPICT
  251. 1028:  offseq3.PICTCAPITOL HILL:Support:offsupt: offseq3.PICTPICT
  252. 1029: doorCAPITOL HILL:Support:offsupt:    door.PICTPICT
  253. 1030: DESKCAPITOL HILL:Support:offsupt:    DESK.PICTPICT
  254. 1031: 
  255. NEW OFFICECAPITOL HILL:Support:offsupt:NEWOFFAIFF
  256. 1032: BP.SND
  257. 1035:  BIGVOTE.PICTCAPITOL HILL:Support:orientsp: BIGVOTE.PICTPICT
  258. 1036: 
  259. BIGVOTE2.PICTCAPITOL HILL:Support:orientsp:
  260. BIGVOTE2.PICTPICT
  261. 1037: 
  262. PLAN2.PICTCAPITOL HILL:Support:offsupt: OFFPLAN.PICTPICT
  263. 1049: on mouseUp
  264.   
  265. end mouseUp
  266. 1050: INVITECAPITOL HILL:Support:offsupt:INVITEAIFF
  267. 1057:  STAFF1.PICTCAPITOL HILL:Support:offsupt:
  268. STAFF.PICTPICT
  269. 1058: BLUE
  270. 1065: SP1&CAPITOL HILL:Support:offsupt:DeskPhon:PH18AIFF
  271. 1066: SP2&CAPITOL HILL:Support:offsupt:DeskPhon:PH19AIFF
  272. 1067: SP3&CAPITOL HILL:Support:offsupt:DeskPhon:PH20AIFF
  273. 1068: DSKINVCAPITOL HILL:Support:offsupt:DSKINVAIFF
  274. 1069: DSKPENCAPITOL HILL:Support:offsupt:DSKPENAIFF
  275. 1076: 
  276. ChfStaff.PICTCAPITOL HILL:Support:offsupt:
  277. ChfStaff.pictPICT
  278. 1077: Constituent Caseworker screen.PCAPITOL HILL:Support:offsupt:
  279. Casewrkr.PICTPICT
  280. 1078: Legislative Aide screen.PICTCAPITOL HILL:Support:offsupt: LegAide.PICTPICT
  281. 1079: Office Manager screen.PICTCAPITOL HILL:Support:offsupt: OffMan.PICTPICT
  282. 1080: Press Secretary screen 2.PICTCAPITOL HILL:Support:offsupt:
  283. PressSec.PICTPICT
  284. 1084: WO3CAPITOL HILL:Support:offVid:WO3MooV
  285. 1086: WO5CAPITOL HILL:Support:offVid:WO5MooV
  286. 1087: macslug woolsey.PICTCAPITOL HILL:Support:offsupt:
  287. slgwools.PICTPICT
  288. 1088:  YOUR OFFICECAPITOL HILL:Support:offsupt:YOUROFFAIFF
  289. 1091: 
  290. job folderCAPITOL HILL:Support:offsupt:jobfoldAIFF
  291. 1153: FARARCAPITOL HILL:Support:offsupt:FARARAIFF
  292. 1154: HAYDENCAPITOL HILL:Support:offsupt:HAYDENAIFF
  293. 1155: STEFANOSCAPITOL HILL:Support:offsupt:STEFANOSAIFF
  294. 1157: MODIGLIOCAPITOL HILL:Support:offsupt:MODIGLIOAIFF
  295. 1158: RAYBALCAPITOL HILL:Support:offsupt:RAYBALAIFF
  296. 1159: WARDCAPITOL HILL:Support:offsupt:WARDAIFF
  297. 1161: BREAMCAPITOL HILL:Support:offsupt:BREAMAIFF
  298. 1162:     CAMBRIDGECAPITOL HILL:Support:offsupt:CAMBRIDGAIFF
  299. 1163: TISCHERCAPITOL HILL:Support:offsupt:TISCHERAIFF
  300. 1165: KRAVITZCAPITOL HILL:Support:offsupt:KRAVITZAIFF
  301. 1166: LEECAPITOL HILL:Support:offsupt:LEEAIFF
  302. 1167: QUINNCAPITOL HILL:Support:offsupt:QUINNAIFF
  303. 1169: BALDWINCAPITOL HILL:Support:offsupt:BALDWINAIFF
  304. 1170:     HERNANDEZCAPITOL HILL:Support:offsupt:HERNANDZAIFF
  305. 1171: TOMEECAPITOL HILL:Support:offsupt:TOMEEAIFF
  306. 1177: FLUSH&CAPITOL HILL:Support:offsupt:fpsounds:FLUSHAIFF
  307. 1178: c0&CAPITOL HILL:Support:offsupt:fpsounds:c0AIFF
  308. 1179: c1&CAPITOL HILL:Support:offsupt:fpsounds:c1AIFF
  309. 1180: c2&CAPITOL HILL:Support:offsupt:fpsounds:c2AIFF
  310. 1181: c3&CAPITOL HILL:Support:offsupt:fpsounds:c3AIFF
  311. 1183: m0&CAPITOL HILL:Support:offsupt:fpsounds:m0AIFF
  312. 1184: m1&CAPITOL HILL:Support:offsupt:fpsounds:m1AIFF
  313. 1185: m2&CAPITOL HILL:Support:offsupt:fpsounds:m2AIFF
  314. 1186: m3&CAPITOL HILL:Support:offsupt:fpsounds:m3AIFF
  315. 1187: m4&CAPITOL HILL:Support:offsupt:fpsounds:m4AIFF
  316. 1188: m5&CAPITOL HILL:Support:offsupt:fpsounds:m5AIFF
  317. 1189: r0&CAPITOL HILL:Support:offsupt:fpsounds:r0AIFF
  318. 1190: r1&CAPITOL HILL:Support:offsupt:fpsounds:r1AIFF
  319. 1191: r2&CAPITOL HILL:Support:offsupt:fpsounds:r2AIFF
  320. 1192: r3&CAPITOL HILL:Support:offsupt:fpsounds:r3AIFF
  321. 1193: r4&CAPITOL HILL:Support:offsupt:fpsounds:r4AIFF
  322. 1194: r5&CAPITOL HILL:Support:offsupt:fpsounds:r5AIFF
  323. 1195: r6&CAPITOL HILL:Support:offsupt:fpsounds:r6AIFF
  324. 1196: s0&CAPITOL HILL:Support:offsupt:fpsounds:s0AIFF
  325. 1197: s1&CAPITOL HILL:Support:offsupt:fpsounds:s1AIFF
  326. 1198: s2&CAPITOL HILL:Support:offsupt:fpsounds:s2AIFF
  327. 1199: s3&CAPITOL HILL:Support:offsupt:fpsounds:s3AIFF
  328. 1200: s4&CAPITOL HILL:Support:offsupt:fpsounds:s4AIFF
  329. 1201: s5&CAPITOL HILL:Support:offsupt:fpsounds:s5AIFF
  330. 1202: s6&CAPITOL HILL:Support:offsupt:fpsounds:s6AIFF
  331. 1203: Yea21
  332. 1235:     MAIL.pictCAPITOL HILL:Support:offsupt:    MAIL.pictPICT
  333. 1236:  phone2.PICTCAPITOL HILL:Support:offsupt: phone2.PICTPICT
  334.  
  335. Fonts
  336. -----
  337. Geneva
  338. Times
  339.